This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
will give you mailServer, mailFile etc. for a given user.
Example from designer help:
Sub Initialize
Dim session As New NotesSession
Dim reg As New NotesRegistration
reg.RegistrationServer = "AceOne"
Call reg.GetUserInfo("Roberta Person", _
mailserver$, _
mailfile$, _
maildomain$, _
mailsystem%, _
profile$)
Messagebox mailserver$,, "Mail server"
Messagebox mailfile$,, "Mail file"
Messagebox maildomain$,, "Mail domain"
If mailsystem% = 1 Then
mailsystemtext$ = "Notes mail"
Else
mailsystemtext$ = "Other than Notes mail"
End If
Messagebox mailsystemtext$,, "Mail system"
Messagebox profile$,, "Profile"
End Sub